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Included in this months Transactor is a list of the 6502 instruction 
set| mnemonics aM what they stawi for followed by their respective machine 
language coding and addressing modes, 

Wien operating in machine language, PET is at top efficiency. Machine 
code programs can execute at speeds 10 to 1000 times that of the equivalent 
MSIC implfflBentation, Al»3, depeiKiing on the operation, they may consume 
as much as 10 times less memory. The r«ison MSIC is so "slow" is that BASIC 
must first be interpreted into machine code such that the Microprocessor can 
handle it. In fact, about 90% of the total osecution time is spent interpreting 
while only about 10% of the time is spent on the actual operation. In machine 
code programs the BASIC interpreter is bypassed hence the greatly increased 
speed of processing. This speed is realizMl most in programs where a lot of 
tests or comparisons are made. MicroChess^ is a -peme example. At level 
8 (playing at it's best) the machine can still .spend as much as 10 minutes 
on a move in same situations. Imagine a chess p?ogram coded in BASICI 

A brief explanation of machine language would be highly impracticle 
because of the variations ai»i possibilities of the concepts. Undoubtedly a 
lot of imprtant information would be ov allocked. However I have hare an 
exorpt from PET User Notes, Issue #5, written by Jim ButterfieMs 



" A Little Exg'cise in PET Machine Language 
Jim Butt^^fieli Toronto, Canada 

Clear the PET completely (NEWtCLR) and enter the 
following three lines of BASIC... Do not insert extra 
spaces! 

100 SYSCIOSO) 
110 GOTOIOO 

120 xxxxxxxxxxxxxxxxxxxxxxxxx 

The last line should not be less than 15 X's, aM pre-; 
fra?ably a few more, say 25, You may list this pcogram 
but do not try to run yet. 

Now you have some TOKEing to do, awi unfortunately 
^u can't have a program help you. First, make sure 
that the above lines are OK by ?PEEK(1050)i this should 
return an 88 (X character). Now starting with POKEIOSO 
,3 2... input the following values? 



Commodore Systems, 3570 Ehaimacj Avenue, Agincourt, Ont. (416-499-^292) 



starting at 1050: 32 228 255 208 1 96 162 157 
Starting at 1060: 128 157 129 157 130 157 131 
Starting at 1070: 202 208 2m 96 

Double-check the above values by listing them with: 

FOR J=1050 TO 1070 STEP 10:FOR K=0 TO 9:?PEEK( J+K) ; : 
NE)n'K:?:NEXTJ 

It is vital that these numbers be correct - one 
mistake aiKi your system will crash. Behind the 96 you 
should see some leftover X's (88 's). 

Now type RUN. Try tapping a few keys and note how 
the screen changes. Stop the program with the STOP key. 

What's it all about? We've written a program in 
machine language, the fundamental 6502 language of the 
PET. In working with the inner fabric of the machine we 
find we get: (i) compactness - we've fitted a whole 
program within one BASIC line: (ii) speed - no BASIC 
program could fill the screen that fast. We lose, 
however, in the need for preciseness; one mistake and 
the system crashes, and you have to switch off aai on 
again. We also lose flexibility - adding an instruction 
isn't easy. 

For those who would like to try tracking the machine 
language program above, a few brief notes, 32-228-255 
calls the PET subroutine to get a character (something 
like BASIC GET). 208-Ji|— 96 exits if no character is seen 
(like IF X$=" " THEN RETURN). Now we're ready to zip 
through the screen with the character we found. We set 
up for repetition with 162-0 which loads an intffl?nal (X) 
regista? for 256 repeats; much lata? we invoke the 
repetition with 202-208-2H1, and after the 256th time we 
return (96). Within the repetition itself, we set the 
four quarters of the screen with four 157-0-xx instructions i" 

Those interested in getting seriously involved in machine language 
should consider first the MOS KIM-1 Microcomputer Module and: 

The First Book of KIH By: Jim Butterfield, Stan Ockers and 

Eric Rehnke 
Publisher: Hayden 

The book is mostly machine language programs written for the KIM. Programming 
them into PET would be most difficult even with the Machine Language Monitor. 
KIM has numerous subroutines in ROM that aren't like PET's. 

Other suggested reading: 

Programming a Microcomputer By: Caxton C. Foster 

Publisher: Addison- Wesley 

MOS 6500 Programming Manual By: Coromodore/MOS Technology 

6502 User Notes By: Eric Rehnke 

P.O. Box 33093 
$12.00/Yr.? North Royalton, Ohio 

^4133 



All four publications are excellent, but for beginners I suggest 
the last three in order (if using PET with the M.L.M. ). 

Besides the parop-am outlined in J. &itterf ielxis article are four more 
that also operate in machine language. The first three read from the DATA 
statements data which has already been converted into decimal. This data 
represents the machine language instructions which (in these three particular 
programs) are POKEd into the second cassette buffer (826 to 1017). Since 
they are in decimal, a conversion program has been included so you may 
convert back to HEX and compare them to the table* Howeva:», not all of 
these will necessarily be instructions (as you will see when jrou find one 
that matches a "Future acpansion" code). Some may be addresses of direct 
data depending on the la'eceeding instruction. Addresses will appear as 
low ox^er first, high order second. For example; 

JSR 00 05 

....will jump to the subroutine starting at location 0500. 

The DATA statements in Life contain the actual hexadecimal repre- 
sentations of the instructions and addresses. They are read by the 
program (line 110), tested for validity (lines 120 and 150), converted to 
d«:imal (lines 130 aiKi mo) and K)KEd into memory (line 160) starting at 
decimal location 6»»00 (HEX 1900). SYS 6i»00 ac^utes the pt'ogjcam. 



View By Jim Butter field 

from an idea by ]&'ad Tempi eton 



10 PRINT"S't'S826 turns PFiGEVIEW ON flND/OR OFF 

20 PRINT -.PRINT "SELECT PAGES WITH •■■P0KE849.. X' 

30 PRINT TflB<10>"TRV X=0.. 2, 4.. 31.. cf J2 

40 FOR J=S26 TO 858 : READ X : POKE J.. >i : NEXT : END 

50 DfiTfl 120.. 173.- 25.. 2.. 73.. 200.. 141.. 25.. 2 

60 DfiTfl 173.. 26.. 2.. 73.. 229.. 141.. 26.. 2.. SS.. 96 

70 DflTfl 162.. 0.. 189.. ©.. 0.. 157.. 0.. 128.. 202 

80 DflTfi 208.. 247.. 76.. 133.. 230 



Non-Stop By Jim Butterf ield 



REri**MHL:HINE LflNGUfiQE STOP KEV DISABLE** 

1 QOSUB 63520: END 

63520 DflTfl 120.. 169.. 9&.- 141.. 25.. 2.. 169.. S 

63521 DATA 141.. 26.. 2.. 88.. 96.. O.. Q.< 

63522 DATA 120.. 169.- 133.. 141.. 25.. 2.. 169.. 230 

63523 DATA 141.. 26.. 2.. 88.. 96.. 0. 0.. 

63524 DATA 32.. 234.. 255.. 169.. 255.. 141.. 9.. 2 

63525 DATA 76.. 136.. 238 

63526 FOR L=S32 TO 874 : READ K : POKE L.. K : NEXT 

63527 RETURN 



Auto-Repeat By The Software Shoppe 

From 'The Paper' Volume 1, Issue #10 



5 REri**HflCHINE LFiNGUhGE flUTO-REPEHT*+ 

la DflTfl 120.. 56.. 169.. 233.. 237.. 26.. 2.. 141 

20 DflTR 26.. 2.. 88.. 96.. 173.. 35.. 2.. 201. 255 

30 DRTFl 208.. 12.. 169.. 0.. 141.. 119.. 3.. 169 

40 DFlTfl 90.. 141.. 120.. 3.. 208.. 25.. 238.. 119 

50 DFlTfl 3.. 173.. 120.. 3.. 20-5.. 119.. 3.. 176.. 14 

60 DflTfl 169. 6.. 141.. 120.. 3.. 162.. 255.. 142 

70 DflTfl 3,. 2.. 232.. 142.. 119.. 3.. 76.. 133.. 23© 

80 FOR 1=889 TO 947 

90 READ .J 

100 POKE I.. .J 

110 NEKT I 

120 PRINT"S't'S889 WILL ENABLE AND DISABLE 

130 PR I NT "THE flUTO REPEAT FUNCTION 

140 END 

200 REM**TRV THIS AUTO-REPEflT IN BASIC** 

210 GET H$ 

220 PRINT fl*.i 

230 POKE 515.. 255 

240 GOTO 200 



Life By Mark Taylor 



100 REt^SL 

lie REA»M:C=LEN(ft«> • IFflf="r'THENEND 

128 IFCC10RC>2THEN2ee 

130 rt»ASC<A4)-48:B=flSC(RI6HT«<rtl,t))-43 

140 H«B<-7«<B31)-<C=2)«<16*<ft+7«(A>9))> 

158 IFNC0ORrO255THErG00 

168 P0KEL.M.L=Ltl:GO7O118 

280 PRINr'BVTE"L"=C"rtl"] ???" .EN» 

380 SArA6488 

310 BATA2B.38.19.2e..3A.I9ic'0..E6,i9,2B..0Q,iA,A§..34.3I>,li..E3 

328 MTA20,70.19,A9,X,3».tl.E3.rt9,FF..CD.12.E8..F0,E6.4C..aB,C3>AA..68,23.4C,3B.C3 

338 BATft EA..Efl. Eft, EA..EA.EA,EA..A2, 19, BD..3rt, 19, 95..1F,CA,D0..F3, 60. Be..8g, 00,15.89 

348 BATft8e,a8,lB.eB..lB,B7.2B..01,FE.De,D6.29.2?..80,E8,83..80.i5.80..00 

358 l>flTAEA,Eft,EA.Eft,Ert,EA.EA..Ert,EA.Eft,Ert,Eft,Eft..EA,EA.Eft..EA,EA,Eft..Ert,EA,EA,EA 

368 DflTAEft,EA,EA.EA,Ert,20.ft6..13,Bl,26,D0,96.ft9..20,91,20..D0,0-4,A9..51..91.2B.29 

370 BATA BD..19.Fe,O>..20.A6,19..60.20,ft6..13,ll,2e..C9.51,F0..06,A9,00,gi,26.F0 

388 BATA04,fl9.01.91,26,20,BD..19.F0,EB.20,rt6.t9..60,A9.eB..AA,A8,85..28,35.26,85 

390 BATA39,fl5.25,85,21,A5.29,35,27.ft5..36,35.3A..60,E6,26..E6,20,E6..33..E8,E4 

408 BATA33,F0,0C,EB,00.B0,eE..E6,27.E6..21.E6,3A.D9,96,ft5.34,C5,21..F0,03,A9..0g 

410 BATA 60,A3.0t,6B..Ert.EA,EA..Ert,EA,EA.29,A6,19,B1.26.D0.06,A9,20..91,39,D0 

428 BATA04,A9,5t.91,39,20.BD,19,F0,ED..20,A6.19,68.20.A&..19,20,2F..lrt,Bl,39.C9 

438 BATA51,F0,0C,ft5,32,C9.03..D9,14.A9..01,91.26..DQ,8E.A5.32,C9,03,Fg,93,C9.02 

440 BATAFB,04,A9,06,91,26,20..BD.i9,F0..D3.20,A&..13,60,98..43,3A,48..A0,80.84.32 

450 BATAA2,03,B5.29,10,15,49..FF,S5,3"..33,A5,39..E5.37.85..22,A5.3A,S5,23,B0..11 

460 BflTAC6,23.B0,aD,13,65,39..85.22.A5..3rt,35,23,99,02,E6..23.Bl,22,C9,51,D0..02 

478 BATAE6,32,CA,D0..CF,68,AA..63,A8,60..s» 



xyt! DIM H*'3> 

1.10 FOR K=e TO 3y:F'RINT ", ".; ; NEIKT : 1=1=0 : 8=8 : 0=8 : L=0 : M=0 : N=e ; 1^=0 

120 PRINT : INPUT"HE:K*crcrcrcrcrcrcrcr ".; HEK* : L==L.EN>:.HEH*> 

130 IF L04 AND L02 THEN PRINT" 2 OR 4 HEK DIGITS UNLV";G0T0 118 

140 IF L=4 THEN 02 : asl;t.2.:'=LEFT$<HEK*.. 2> 

150 Fi*'::i:)=RIGHT*'::HE:K$.. 2> ; C=2 

160 H=ft+1 

170 H=fiSC >:; Fl* < H > > -48 

180 IF fl<0 OR fl>22 THEN PRINT "IhE^:! DIGITS 0rJLV":G0T0 110 

190 B=flSC '■. R I GHT* <. f\i- < K > .. 1 > > -4S 

200 IF B<0 OR B>22 THEN PRINT "IhEK DIGITS ONLV":GOTO 118 

210 N=E+7* '■. B>9 >-<. C=2 ':> ■*■ <'■. 16* C R+7* < f !>9 > > ) 

220 IF L=0 THEN M=r-1+N : PRINT"DEi;: ADDRESS = "MMjOTO 110 

230 IF L=4 THEN L=0 : M=N*256 : GOTO 168 

240 PRINT" IN DEC = crcrcrcrcr "N : GOTO 110 

100 REM DECIMhL to BINflRV TO HEJ^lflDECIMflL CONVERTER FROM TRflNSflCTOR ISSUE NO, 10 

110 REM WRITTEN BV KARL J. HILDON flBSOLUTELV NO COPVRIGHTS 

120 DIM fl$-;;i6::' 

130 INPUT "DEC VALUE ".; D* 

140 fi=V AL < D* ;:■ 

150 I F A" I NT < A > <>0 THEN PR I NT : PR I NT " 1 1 NTEGERS ONL V " : PR I NT : GOTO130 

160 IF 0:>65535 THEN PRINT : PR I NT "I 65535 MAXIMUM ": PRINT : QOTO130 

170 PRINT :PRINT"BINARV: ".; 

180 REM **:+::+:*:+:*:+:**:+::+.•:+::+::+::+::+::+.•:+::+: 

190 REM +■+"+€: I NARV CONVERT*** 

2£10 REM *:+:**:+:*:+:**:+::+:*:+"+:*:+:;+;:+::+::+: 

210 FOR X=15 TO STEP-i 

220 V=A-2t;K 

230 IF V<:0 THEN A$'::K> = "0" 

240 IF V>=0 THEN A*'::K> = "1" : A=A--2tK 

250 PRINT A*<K>; 

260 C=C+1:IF C=4 THEN PRINT" ".: : 0=8 

270 NEKT 

280 REM ***************** 

290 REM ***HEK CONVERT*** 

300 REM *:+:*************** 

310 S*=" " :K=3 

320 PR I NT : PR I NT : PR I NT " HEK : " .; 

330 FOR H=15 TO STEP-1 

340 Q= V AL < A* < H > > 

350 IF G=l THEN T=T+2tK 

360 K=K"1 

370 IF K<0 THEN GOSUB 488 : K=3 : T=0 

380 NEKT 

390 PRINT: FOR L=0 TO 39 : PRINT". ".; : NEKT : PRINT : GOTC130 

400 ON T+1 GOTO 410,. 420.. 43©.. 440.. 450.. 460.. 478.. 480.. 4:?0.. 580.. 518.. 520.. 538.. 548.. 550.. 560 

410 PRINT "0"+St-.i : RETURN 

420 PRINT "1"+S*.i : RETURN 

430 PRINT "2"+S*.; : RETURN 

440 PRINT "3"+S*.; : RETURN 

450 PRINT "4"+S-$:i : RETURN 

460 PRINT "5"+S$.: ; RETURN 

470 PRINT "6"+S*.; : RETURN 

488 PRINT "7"+S$.; : RETURN 

490 PRINT "S"+S*.i : RETURN 

500 PRINT "9"+S*.; : RETURN 

510 PRINT "A"+S*.; : RETURN 

520 PRINT "B"+S*.: : RETURN 

530 PRINT "C"+S$.; : RETURN 

540 PRINT "D"+S*.i : RETURN 

58 PRINT "E"+S*.; : RETURN 

560 PRINT "F"+S-4;.i : RETURN 



c-c::. 



SHIFTED CAPITALS 

When writing prograias with a great deal of text, it is sometimes 
best to use the lower case charactea:' set. This makes for easier reading. 
The game Hammurabi is a good example. 

To obtain the lower case mode on PET, location 59168 must be POKEd 
with m (12 returns it to graphics). Now lower case lett«ps, plus some 
oth^> graphics are available on the PET by typing the desired letter while 
depressing the 'shift* key. However when a lot of t®ct is involved, 
constantly holding down the shift key can become rath®:' awkward, A 
•keyboard invert®?' ^reuld certainly be desirable, 

P.T, Spencer, a high school teacher in Agincourt, enquired about this 
possibility and then answered his own question with the following program 
which he has submitted for the Transactor. 



10000 REri**KEVBOflRD INVERTER SUBROUTINE** 

10010 POKE 59468. 14 

10020 Z*="" 

10040 GET V$:IF V*="" THEN 10840 

10050 V=flSC<V*>;IF V=13 THEN 1.8120 

10060 IF V>64 AND V<:91 THEN V=V+128 : GOTO 1009© 

10070 IF V:>192 AND VC219 THEN V=V-12S:G0T0 10090 

10080 GOTO 10100 

10090 V*=CHR*':;V> 

10100 PRINT V*; : Z*=Z*+V* : GOTO 18040 

10120 PR I NT : RETURN 



The program only aff^:ts the alphabetic characters and ji'ints 
everything else out normally. Also, since the characters are being displayed 
ui^er program control the lines won't be ent«»ed into mesjory, only displayed! 
To do this program execution would have to be halted aiKi then line numbers 
followed by ?'» inserted at the beginning of every second line of text. 
(Be carefiil not to type more than 75 character's per 2 lines or inserting is 
impossible. Also do not stop program ^cecution less than 5 lines from the 
bottom or the "BREAK - ^ADY" signal will cause teact on the very top line 
to be scrolled off the screen.) Once this insertion is finished, hitting 
'RETURN' enters the characters as program t©ct. Only one pitfall is that 
these PRINT stataoBents will return the text without the visual continuity 
(i.e. 'PRINT' starts at actreme left) unless the closing quotation narks are 
inserted and followed by semi«-colons. Therefore it would be more desirable 
to enter the text into DATA stat«nents aiwi concatenate using the READ commaiKi. 
Instead you would insert the line numbers followed by DATA" or you could have 
the program do it for you using the following iwjdifications: 



10000 REM **KEVDflTfl KEVBOflRD INVERTER** 

10010 POKE 59468.. 14 

10020 Z*="" 

10030 L=0 : C:=C+10 : PR I NT : PR I NTC.: " cl " -= " DRTR " .; : PR I NT CHR* < 34 > , 

10040 GET V*:IF V*="" THEN 10048 

10050 V=flSC<V*>;IF V=13 THEN 18120 

10060 IF V>64 AND VC91 THEN Y=V+128 : GOTO 10890 

10070 IF V:>192 AND V<2i9 THEN V=V-12S : GOTO 18090 

10080 GOTO 10100 

10090 V*=CHR* < V > 

10100 PRINT V*j :Z$=Z*+V*:L=L+1: IF L=70 THEN 18028 

10110 GOTO 10040 

10120 PRINT: STOP 



Micro Magazine 

Published monthly, MICRO is the only mag. devoted entirely to 
6502 based systems. It covers software and hardware on PET, KIM-1, 
APPLE, AIM, SIM and virtually anything to do with the MOS 6502. MICRO 
has run out of back issues but they are offering "The Best of MICRO 
Volume 1", which covers issues 1 through 6. Cost is 16.00 plus tl.OO 
postage and handling, payable in US Funds. Subscriptions are also 
available; 115-00 (US) for 12 issues. Send your name and address, etc., 
to: 

MICRO Magazine 

P.O.Box 5, 

SO. CHELMSFORD, MA 

01824. 

Specify Best of MICRO and/or subscription and at which issue you wish 
your subscription to start. Highly recommended. 



Transactor Volume 2 



Yes it's renewal tiBse. Although your Voluue 1 subscription covers 
one m>re issue, hw& is the Volume 2 subKiription form. The Transactor 

oprar'ates on a treak-even basis. Therefore the cost of "The Transactor 
Volume 2" will be $15.00. 

Raiently I have received various requests regaining article 8ubj©3ts. 
If ytw have a subj«:t idea you ai«i other PET users would like to see 
diK:uss«i in future Transactors, please include it at the bottom of the 
order form. 



To receive Transactor Volume 2 bulletins, please return this 

form with your cheque for $15,00 annually renewable, to CBM 

3370 Pharmacy Avenue, Agincourt, Ontario, MIW 2KH. Volume 1 %/ril O 

back issues will be available at 10 dollars for a limited Y VJL iL 

time only (while supplies last). 



NAME................................................... 

COMPANY ( if applicable) ................................ 

ADDRESS. 

POSTAL CODE . 



RECEIPT REQUIRED? YES D NO D 

(Invoices cannot be issued for the $15.00 annual fee) 



IDEAS 6 COMMENTS. 



NEW PRODUCT--PETPILOT 

FOR RELEASE H-15-79 

Commodore PET owners get full standard PILOT (the most 
poDular computer-assisted instruction language) on a minimum 
size PET. Dave Gomberg, of the PETPILOT Project, announced 
not only a PETPILOT Language processor, but also an Editor 
suitable for preparing long programs of up to about 80,000 
characters , 

The new product features full BASIC in compute statements as 
well as two new keywords designed to make PILOT programming 
easier and faster. All language features of the most recent 
PILOT standard are implemented. In addition, the system has 
been designed to be easy to learn and use. 

Because PET tapes can only move forv;ard, there are limits, 
depending on memory size, to the distance a PETPILOT program 
may jump upward, but this does not create a barrier to the 
effective use of PETPILOT. 

Only the tape drive supplied with the PET is required to run 
any PETPILOT program. While simple PETPILOT programs can be 
created on a one tape PET, authors writing long programs 
will need the second cassette drive offered by Commodore 
International of Palo Alto, CA, manufacturer of the PET. 



The package offered by the PETPILOT Project contains both 
programs, a sample PETPILOT Drogram,''a teacher's manual, a 
quick reference card, and licenses to run the programs on a 
single PET. A tutorial course of two' one hour lessons in 
effective use of PETPILOT is also available. The basic 
package costs $12, the tutorial is an extra $8. Both 
products can be ordered by specifing the PET serial number 
to be licensed to Dave Gomberg, 7 Gateview Court, San 
Francisco CA 9'4116. 



TAX ONTARIO 1978 

Last months listing of the Income Tax program requires a 
few revisions due to the fact that the Centronics 779 does not 
recognize PET graphics. The corrections are as follows: 

111 INPUT" cdlNSTEUCTI 

112 PRINT" cdONTAEIO IN 

113 PRINT" cdFOLLOW YOUR 

115 PRINT" cdPOR 'NIL' ITEMS 

116 PRINT" cdPOR 'MULTIPLE' ITEMS 

31 PRINT" ! EXEMPTIONS 

470 IF I 231 E3 THEN PRINT" I NO TAX PAYABLE 

2110 YS="":PRINT"&@cl"; 

2139 IP (Z=157 OR Z=20) AND Y$ "" THEN Y$=LEPT$(Y$, 
LEN(YS)-I) :PRINT"cl]?^" ; :G0T02147 

2140 IF ZS="+" THEN PRINT" cd" ;: I=I+VAL(YS) :F0RJ=1 TO 
LEN(YS) : PRINT" cl" ; :NEX 

2142 IF Z=13 AND 1=0 THEN PRINT"cu"; 

cd-Cursor Down, I-RVS On, &@-Shifted '&' , cl-Gursor Left, 
]z^-Blahk or Space, cu-Cursor Up. 



T I S Workbooks 

Total Information Services now has 5 workbooks relating to 
the PET. All are excellent, particularly PET Cassette on data file 
writing. 



* 



Getting Started With Your PET - $5-00* 

PET String and Array Handling - ^5.00 

PET Graphics - S6.00* 

PET Cassette - 16.00* 

PET Miscellaneous - ^5.00* 



payable in US Funds. Write To 



Total Information Services 
P.O.Box 921, 
LOS ALAMOS, NM 
875^4 



Hardware Fix 



In Transactor #8, a hardware fix was illustrated to overcome the 
data file write problem. However, to install it required dismantling 
the cassette deck so the interface idea was presented. This still had 
one problem area: the switch. Fortunately, I've received two responses 
regarding the ' INTEEFACE' . The first was from Jim Yost in Somerville,MA, 

He writes "In reference to Bulletin #8: The capacitor charging 

switch you want is a simple transistor. The basic operational rule is 
that whatever current flows in the base allows jB times that to flow 
into the collector. P's typically are 100 or more nowadays. The 
circuit is thus: 



1 or 2 of any , 6.5v Motor source 

handy diodes to 

compensate difference 

vnrite 5v and motor 6.5v J emitter 

;„ITE -HfflWMl-B-^' '''^ PHP-any Wy o.e 

H.7K-6.8K collectoi? 




15,000 jxf 



The write pulses (lows) charge the 15,000pF cap in pulses so 
that it is charged at the end of a write sequence when the motor 
source drops. Don't use the 15pF - it would short the write pulses". 

Secondly, Andrew Ghiu of Toronto has designed, among other things, 
an interface type fix for file writing to the cassette deck. This 
and other devices are for sale through Rapid Electronics. Andrew 
has submitted a complete description of the cassette deck interface 
and its operation which follows. 

Thank you, Andrew and Jim, and once again thanks to Eichard 

Leon for launching the concept. 



Andrew Chiu 
39 Farmview Cr,, 
WILLOWDALE, Ontario 
M2J 1G5 



HARDWARE FIX ADAPTER 



The object of this design is to adapt Richard Lean's 
Hardware Fix (ref: TRANSACTOR BULLETIN #8) without dis- 
mantling your cassette and using Karl's "Interface" idea 
we can install a circuit between a 6 pin Molex Plug and 
the printed circuit board edge connector (see Fig, 6), 

A quick look at the table provided by Karl J, in the 
Transactor Bulletin #8 (table 1) indicates that when the 
cassette is doing a write operation the write-line is 'active' 
and for other operations it is ' high ' , therefore based on this 
unique active state a simple switching circuit can be controlled, 



TABLE 1 



PIN 

on PCB 
Cardedge 


OPERATION 


NONE 


READ 


miTE 


READ 


LOW 


ACTIVE 


ACTIVE 


i V/RITE 


HIGH 


HIGH 


ACTIVE • 


SENSE 
MOTOR 


HIGH 
OPEN 


LOW 

6.5V 


LOW 
6.5V 



HOW IT WORKS. Most PET lovers are the software type, 
in order to understand the theory behind this circuit, 
let us review some characteristics of the key element, 
a diode. 



The ideal-diode approximation strips away all but the 
bones of diode operation. VJhat does a diode do? It conducts 
well in the forward direction and poorly in the reverse 
direction. Boil this down to its essence, and this is what 
you get: ideally, a rectifier diode acts like a perfect 
conductor (zero voltage) when forward-biased and like a 
perfect insulator (zero current) when reverse-biased as 
shown in Fig, 3. 



In circuit terras, an ideal diode acts like an automatic 
switch, V/hen conventional current tries to flow in the 
direction of the diode arrow, the switch is closed (see Fig. 3b). 
If conventional current tries flowing the other way, the switch 
is open (Fig. 3c), We cannot simplify the idea of the diode 
beyond this point, IDEAL 
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Fig 3. (a) Ideal-diode Curve. (b) Cloded-switch analogy, 
(c) Open-switch analogy. 

Once the operation of the diode is understood, then v;e 
can look at Fig.l, It is a complete diagram of the Hardware 
Fix Adapter, IC.l is connected as a negative-recovery 
monostable circuit. As long as the write-line is active, 
the circuit stays triggered and the output remains High, 
(approximately equal supply voltage at no load). The current 
flows out from pin 3 and the capacitor G3 charges through the 
resistor R2 and diode D2, The capacitor is acting like a 
temporary quick charge battery. When the block is finished, 
the power to the motor is turned OFF and the write-line go 
High. The capacitor C3 will discharge through D3 to the 
cassette motor. The discharged energy provided power to the 
motor for a small period of time. This allows a larger gap 
between blocks. 



Fig, 4 is a simplified circuit, only the diode and C3 is 
shown. The imaginary switches are the approximation of IC.l 
and the transistor switch which is controlled by the internal 
operation of your PET, Fig. 4 a & b when the motor power 
switch is turned ON and i\rrite-line is active, Dl and D2 are 
both ON, but D3 is OFF. Therefore the current has to flow 
into the capacitor and the motor. Fig 4 c & d when motor 
power switch is OFF and write-line is High, Dl and D2 is Off, 
but D3 is ON, Therefore the current can discharge through 
D3 to the motor. The ideal diode model is a helpful tool to 
explain the operation of the circuit. 
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Fig, 4 Simplified circuit diagram of the Hardware Fix Adapter, 



CONSTRUCTION, Wire-Wrap, point-to-point or printed-c ircuit 
techniques can be employed in the construction of the Adapter, 
However a printed-c ircut board definitely makes things easier 
once it has been made or obtained, I built my unit with all 
the components mounted on the board except the 20,000 uF capacitor. 
Watch the polarily of all the diodes and G3, The cathode (-Ve) 
end of the diode is marked with a Band or Bands, The polarity 
of the capacitor is marked on the label, some are colour coded, 
(red for positive). Transistor Ol may be supplied in different 
shapes. To identify the transistor leads, please check the 
manufacturers data book, A component lay out diagram is shoxm 
in Fig. 2, Watch the spacing (0.156") of the card-edge connector, 
and the slot. The physical dimension must fit the 6 pin Molex 
Plug which the cassette uses. 
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Fig 1. Circuit diagram of the Hardware Fix Adapter. 
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Fig 2. Parts placement, component-side view. 



OPEN THE PET COHPUTER, {This is the procedure outlined in 

the service manual) 

1, Press the rocker switch to the OFF position. 

2, Remove the power cord from the v/all socket to avoid 
possible electrical shock, 

3, Remove the two screws located on each side of the unit 
under the lip of the cover, 

4, Lift the cover slowly - a few inches, V/hen you locate 
the cable leading to the cassette, remove the connector 
at the main board. Then left the cover all the \tfay up 
and engage the supporting rod located on the left side 
of the cover, 

INSTALLATION PROCEDURE OF THE ADAPTER, (see Fig. 5,6 & 7) 

1, Plug the 6 pin Molex Plug to the Adapter's card-edge 
connector, 

2, Plug the Adapter to the main board's card-edge connector, 

3, The big 20,000 uF capacitor can be mount in front of the 
main board by locking cable ties and adhesive backed mounts. 

FINAL TESTING, Mtxrphy's law states that "If anything can 
go wrong, IT WILL", So please check the polarity of all the 
components again before you touch the power switch. One thing 
will damage your PET for sure is a short circuit befci?een ground 
and +5V line or +6,5V motor conlarol line. When you think 
everything is OK, Turn On your PET, and use a vollaieter to 
measure the ^roltage across C3, it should give you a veiy small 
reading Camost zero). If the voltage is right, type in the 
testing program. After you finished, SAVE the program, while 
your PET is saving the px>ogram, monitor the voltage across C3 
again, it should rise slowly to approximately to 4,5V and stop 
there, Iflien finished saving, the voltage will drop to zero 
again (0,6V), Next, put a new "^pe in the cassette and RUN 
the test program. The test program will check and print the 
number of drop out errors found - you should have none, 

PARTS AVAILABILITY. Essential parts, including 6 pin 
card-edge receptacle (# K50013PCSCGD6 ) , Universal PC Board 
and 20,000 uF are available from ARKON ELECTRONICS LTD., 
91 Queen Street E,, TORONTO, Ontario, M5C ISl. 
A assembled and tested unit for $26,00 is available from 
RAPID ELECTRONIC, P,0. Box 1031, Station 'B', WILLOVDALE, 
Ontario, M2K 2T6, 



Fig 5. Simplified 
inside view of the PET 
with the cover removed, 




Card-edge 
connector for 
cassette No.l 
6 pin Molex 
Plug, 



Card-edge 
connector for 
cassette No, 2 
6 pin Molex 
Plug, 



Fig 7, Simplified 
view of the main 
logic board. 



Fig, 6 Installation 

of the Adapter. 
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1 REM CREATION OF THE TEST FILE 

10 POKE 243,122: POKE 244,2 

20 OPEN 1,1,1 :REM OPEN CASSETTE NO.l 

30 FOR 1=1 TO 300 

40 PRINT I 

50 PRINT#1, I 

60 NEXT I 

70 PRINT#1: CLOSEl 

80 STOP 



NOTE: For Cassette NO. 2 the follo\\ring 
lines have to be changed to :- 
10 POKE 243, 58: POKE 244,3 
20 OPEN 1,2,1 
105 OPEN 1,2 



100 REM RECOVER AND TEST THE TEST FILE 

105 OPEN 1 

110 FOR 1=1 TO 300 

120 INPUT#1,A 

130 IF (ST) AND 64 THEN GOTO 170 

140 PRINT A; 

150 IF A B+1 THEN PRINT "ERROR": J=J+1 

160 B=A: NEXT I 

170 CLOSE 1: PRINT J; "ERRORS FOUND" 



